EnigmA Amiga Run 1995 November/EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso/earcd/program/amos/amoslist.lzh/AMOSLIST/[e-mail]_Wed Sep 27 17:51:11 1995.msg

Internet Message Format | 1995-10-02 | 4KB

Received: from svcs1.digex.net (svcs1.digex.net [204.91.197.224]) by mail1.access.digex.net (8.6.12/8.6.12) with ESMTP id RAA14465;  for <[e-mail]> ; Wed, 27 Sep 1995 17:51:09 -0400
Received: (from daemon@localhost) by svcs1.digex.net (8.6.12/8.6.12) id OAA05281 for amos-out; Wed, 27 Sep 1995 14:19:28 -0400
Received: from mail1.access.digex.net (mail1.access.digex.net [205.197.247.2]) by svcs1.digex.net (8.6.12/8.6.12) with ESMTP id OAA05278 for <[e-mail]>; Wed, 27 Sep 1995 14:19:27 -0400
Received: from red.paston.co.uk (red.paston.co.uk [194.129.188.3]) by mail1.access.digex.net (8.6.12/8.6.12) with SMTP id OAA18127;  for <[e-mail]> ; Wed, 27 Sep 1995 14:19:20 -0400
Received: from bwyatt.paston.co.uk by red.paston.co.uk (5.x/SMI-SVR4)
    id AB03125; Wed, 27 Sep 1995 19:11:58 +0100
Received: by paston.co.uk.uucp (V1.16/Amiga)
    id AA001zd; Wed, 27 Sep 95 23:10:56 GMT
Date: Wed, 27 Sep 95 23:10:56 GMT
Message-Id: <[e-mail]>
In-Reply-To:  <[e-mail]>
             (from [e-mail])
             (on Wed, 27 Sep 95 13:52:33)
Lines: 68
X-Mailer: ADMail 1.5 Copyright 1995 S.T.Brown
From: [e-mail] (Ben Wyatt)
To: [e-mail]
Subject: Re: Help me!!
Status: RO
X-Status:

Greetings [e-mail], you wrote some text on the subject
Help me!!, and now I'm going to answer it.

M> PH> > M> Finally, it must be fast enough, even if not just like the
M> PH> > Circle command
M> PH> > M> (or Fcircle by Turbo extension!).
M>
M> Unluckly, Turbo extension (F Draw) doesn't work on double buffered screens.
M> To display the line you must enter: Screen Swap, and I can't do it in my
M> program!

If you're working on double buffered screens, draw it first on a single
buffered one and copy it over. It should be much faster...

M> PH> If you want speed you should put Sin & Cos into arrays. Floating point
M> PH> calculations are really sssslllooooowwwwww.....
M> PH>
M> PH> Example:
M> PH>
M> PH> dim si(360),co(360)
M> PH> for t=0 to 360:si(t)=sin(t)*256:co(t)=cos(t)*256:next
M>
M>  > I usually (virtually always) do
M>
M> I tried more that once: it's INCREDIBLE but the functions are as fast as
M>
M> the
M> arrays (or as slow as...!) at least in the uncompiled version. do the
M> arrays
M> improve in the compiled version more than the functions??

You *must* use a multiple which is a power of 2 so the AMOS Pro compiler
optimises it. If you have the original compiler, there probably won't
be any difference between that and the sin/cos functions.

M> PH> and the draw part should be:
M> PH> Draw To X+(SI(N)*R)/256,Y-(CO(N)*R)/256
M> PH>
M> PH> the /256 is done with bitshifting so it don't take much of time,
M> PH> at least when compiled. Btw. isn't AMCAF's Turbo draw much faster?
M> PH> If you have AMCAF (or Turbo extension) use it instead of amos!
M>
M> Sorry, but I have alreasy said the I can't use Turbo. What about AmCaf??
M> Do you know a way to solve the problem??

This proc only uses AMCAF...

M>  > So, the revised version...
M>  > Procedure _PART_OF_CIRCLE[R,A,B,X,Y,STP]
M>  > Gr Locate X+QSin(A,R),Y-QCos(B,R/2)
M>  > For N=A+STP To A+B Step STP
M>  > Turbo Draw To X+QSin(N,R),Y-QCos(N,R/2)
M>  > Next N
M>  > End Proc
M>
M> Ehi, there an ERROR!! In the first line, it must NOT be ...,Y-QCos(B,R/2)
M> but must be ...,Y-QCos(A,R/2)
M>                        -
M>
M> It was present even in the other version of this proc: check them!!

Sorry! A and B look very similar on my interlace screen! You're right, it
should be an "A".

Bye  _________________________________
    /                                 \
    > Ben Wyatt - [e-mail] <
    \_________________________________/ �1995 Very Interesting Signatures